home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / TroyReturns.dxr / 00005_Game Constants.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  3.3 KB  |  90 lines
  1. on initializeterrainSet
  2.   global terrainRef
  3.   terrainRef = []
  4.   membername = ["Void Block"]
  5.   add(terrainRef, [membername, 0, 0, 0, 0])
  6.   membername = ["Iron Block"]
  7.   add(terrainRef, [membername, 1, 1, 0, 1])
  8.   membername = ["Iron Floor Left"]
  9.   add(terrainRef, [membername, 1, 1, 0, 0])
  10.   membername = ["Iron Floor Center"]
  11.   add(terrainRef, [membername, 1, 1, 0, 0])
  12.   membername = ["Iron Floor Right"]
  13.   add(terrainRef, [membername, 1, 1, 0, 0])
  14.   membername = ["lavatop_0", "lavatop_1", "lavatop_2", "lavatop_3"]
  15.   add(terrainRef, [membername, 0, 3, 1, 11])
  16.   membername = ["lavabottom_0", "lavabottom_1", "lavabottom_2", "lavabottom_3"]
  17.   add(terrainRef, [membername, 0, 3, 1, 11])
  18.   membername = ["Sign 1"]
  19.   add(terrainRef, [membername, 0, 1, 0, 0])
  20.   membername = ["Sign 2"]
  21.   add(terrainRef, [membername, 0, 1, 0, 0])
  22.   membername = ["Metal Grating"]
  23.   add(terrainRef, [membername, 3, 1, 0, 0])
  24.   membername = ["Conveyer A1", "Conveyer A2", "Conveyer A3", "Conveyer A4"]
  25.   add(terrainRef, [membername, 1, 1, 0, 2])
  26.   membername = ["Conveyer B1", "Conveyer B2", "Conveyer B3", "Conveyer B4"]
  27.   add(terrainRef, [membername, 1, 1, 0, 3])
  28.   membername = ["Purple Block"]
  29.   add(terrainRef, [membername, 1, 1, 0, 12])
  30.   membername = ["lock Empty"]
  31.   add(terrainRef, [membername, 1, 1, 0, 5])
  32.   membername = ["Door Arch"]
  33.   add(terrainRef, [membername, 0, 1, 0, 0])
  34.   membername = ["Door Body"]
  35.   add(terrainRef, [membername, 0, 1, 0, 0])
  36.   membername = ["Lower Sticks"]
  37.   add(terrainRef, [membername, 0, 2, 0, 10])
  38.   membername = ["Upper Sticks"]
  39.   add(terrainRef, [membername, 0, 2, 0, 10])
  40.   membername = ["left Sticks"]
  41.   add(terrainRef, [membername, 0, 2, 0, 10])
  42.   membername = ["Right Sticks"]
  43.   add(terrainRef, [membername, 0, 2, 0, 10])
  44.   membername = ["BlueStone"]
  45.   add(terrainRef, [membername, 1, 1, 0, 6])
  46.   membername = ["GreenStone"]
  47.   add(terrainRef, [membername, 1, 1, 0, 7])
  48.   membername = ["YellowStone"]
  49.   add(terrainRef, [membername, 1, 1, 0, 8])
  50.   membername = ["RedStone"]
  51.   add(terrainRef, [membername, 1, 1, 0, 9])
  52.   membername = ["Teeth Pit 1", "Teeth Pit 2", "Teeth Pit 3", "Teeth Pit 4", "Teeth Pit 3", "Teeth Pit 2"]
  53.   add(terrainRef, [membername, 0, 3, 1, 10])
  54.   membername = ["Vertical Shafts"]
  55.   add(terrainRef, [membername, 0, 2, 0, 0])
  56.   membername = ["Horizontal Shafts"]
  57.   add(terrainRef, [membername, 0, 2, 0, 0])
  58.   membername = ["Sign 1"]
  59.   add(terrainRef, [membername, 0, 2, 0, 0])
  60.   membername = ["Sign 2"]
  61.   add(terrainRef, [membername, 0, 2, 0, 0])
  62.   membername = ["Sign 3"]
  63.   add(terrainRef, [membername, 0, 2, 0, 0])
  64.   membername = ["Sign 4"]
  65.   add(terrainRef, [membername, 0, 2, 0, 0])
  66.   membername = ["Sign 5"]
  67.   add(terrainRef, [membername, 0, 2, 0, 0])
  68.   membername = ["Sign 6"]
  69.   add(terrainRef, [membername, 0, 2, 0, 0])
  70.   membername = ["Sign 7"]
  71.   add(terrainRef, [membername, 0, 2, 0, 0])
  72.   membername = ["Sign 8"]
  73.   add(terrainRef, [membername, 0, 2, 0, 0])
  74.   membername = ["lavabot_0", "lavabot_1", "lavabot_2", "lavabot_3"]
  75.   add(terrainRef, [membername, 0, 3, 1, 11])
  76.   membername = ["Thin Platform"]
  77.   add(terrainRef, [membername, 2, 1, 0, 0])
  78. end
  79.  
  80. on initializeConstants
  81.   global terrainSO, screenDimensions, screenTileSize, paletteSO, playerSO, monsterSO, pickupSO
  82.   terrainSO = 100
  83.   screenDimensions = point(13, 10)
  84.   screenTileSize = 50
  85.   paletteSO = 400
  86.   playerSO = 250
  87.   monsterSO = 255
  88.   pickupSO = 280
  89. end
  90.